﻿Imports System.Web.UI
Imports SISSAT.WebDevelopment.Views
Imports SISSAT.BusinessLayer.DomainModels

Namespace [Shared].MasterPages
    Public Class [Default]
        Inherits MasterPage

        Property FullName As String

        Private Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
            Dim employee As Employee = SISSATPageBase.User.Employee
            FullName = String.Format("{0} {1}", employee.FirstName, employee.LastName)
        End Sub

    End Class
End Namespace
